function px=pol1(a,x)
% Calcolo del valore del polinomio: 
%
% a(1)x^(n-1) + a(2) x^(n-2) + .... + a(n-1) x + a(n)
% 
% nel punti contenuti nel vettore x
%
n=length(a);
px = a(n);
for i=n-1:-1:1
   px = px + a(i)*x.^(n-i);
end

   
